Stop `fixup-whitespace' adding trailing whitespace (Bug#18783)

* lisp/simple.el (fixup-whitespace): Insert no spaces if point is at
end of line after deleting horizontal whitespace.

Copyright-paperwork-exempt: yes

diff --git a/lisp/simple.el b/lisp/simple.el
index 369fbf7192316c883a88929a07e44868f9012436..48c1a9b15d62f0689ab5c2cdd99b9cb42a4161ee 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -833,7 +833,7 @@ Leave one space or none, according to the context."
   (interactive "*")
   (save-excursion
     (delete-horizontal-space)
-    (if (or (looking-at "^\\|\\s)")
+    (if (or (looking-at "^\\|$\\|\\s)")
            (save-excursion (forward-char -1)
                            (looking-at "$\\|\\s(\\|\\s'")))
        nil